Imports Microsoft.VisualBasic

Public Class Planificacion_M2
    Private _id As Integer
    Private _marca As String
    Private _descripcion As String
    Private _cantidad As Integer
    Private _largo As Integer
    Private _ancho As Integer
    Private _observacion As String
    Private _fk_plani_m1 As Integer

    Public Sub New(ByVal marca As String, ByVal descripcion As String, ByVal cantidad As Integer, ByVal largo As Integer, _
                  ByVal ancho As Integer, ByVal observacion As String, ByVal fk_plani_m1 As Integer, Optional ByVal id As Integer = -1)

        Me._marca = marca
        Me._descripcion = descripcion
        Me._cantidad = cantidad
        Me._largo = largo
        Me._ancho = ancho
        Me._observacion = observacion
        Me._fk_plani_m1 = fk_plani_m1
        Me._id = id

    End Sub

    Public Property id() As Integer
        Get
            Return _Id
        End Get

        Set(ByVal value As Integer)
            _Id = value
        End Set
    End Property

    Public Property marca() As String
        Get
            Return _marca
        End Get

        Set(ByVal value As String)
            _marca = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get

        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property

    Public Property Cantidad() As Integer
        Get
            Return _cantidad
        End Get

        Set(ByVal value As Integer)
            _cantidad = value
        End Set
    End Property

    Public Property Largo() As Integer
        Get
            Return _largo
        End Get

        Set(ByVal value As Integer)
            _largo = value
        End Set
    End Property

    Public Property Ancho() As Integer
        Get
            Return _ancho
        End Get

        Set(ByVal value As Integer)
            _ancho = value
        End Set
    End Property

    Public Property Observacion() As String
        Get
            Return _observacion
        End Get

        Set(ByVal value As String)
            _observacion = value
        End Set
    End Property

    Public Property Fk_plani_m1() As Integer
        Get
            Return _fk_plani_m1
        End Get

        Set(ByVal value As Integer)
            _fk_plani_m1 = value
        End Set
    End Property



    

End Class
